home *** CD-ROM | disk | FTP | other *** search
/ TOS Silver 2000 / TOS Silver 2000.iso / programm / MM2_DEV / S / GEM / GEMOPS.ICL < prev    next >
Encoding:
Text File  |  1990-10-09  |  9.0 KB  |  261 lines
  1.  
  2. (*      Include-Datei:
  3.  *
  4.  *      Konstantendefinitionen für die Megamax Modula-2 GEM-Library
  5.  *)
  6.  
  7.  
  8. CONST
  9.                 (*  A E S - Opcodes  *)
  10.                 (*  ===============  *)
  11.                 
  12.         (*  Application Manager
  13.          *)
  14.         APPL_INIT               = 10;
  15.         APPL_READ               = 11;
  16.         APPL_WRITE              = 12;
  17.         APPL_FIND               = 13;
  18.         APPL_TPLAY              = 14;
  19.         APPL_TRECORD            = 15;
  20.         APPL_EXIT               = 19;
  21.         
  22.         (*  Event Manager
  23.           *)
  24.         EVNT_KEYBD              = 20;
  25.         EVNT_BUTTON             = 21;
  26.         EVNT_MOUSE              = 22;
  27.         EVNT_MESAG              = 23;
  28.         EVNT_TIMER              = 24;
  29.         EVNT_MULTI              = 25;
  30.         EVNT_DCLICK             = 26;
  31.         
  32.         (*  Menu Manager
  33.          *)
  34.         MENU_BAR                = 30;
  35.         MENU_ICHECK             = 31;
  36.         MENU_IENABLE            = 32;
  37.         MENU_TNORMAL            = 33;
  38.         MENU_TEXT               = 34;
  39.         MENU_REGISTER           = 35;
  40.         
  41.         (*  Object Manager
  42.          *)
  43.         OBJC_ADD                = 40;
  44.         OBJC_DELETE             = 41;
  45.         OBJC_DRAW               = 42;
  46.         OBJC_FIND               = 43;
  47.         OBJC_OFFSET             = 44;
  48.         OBJC_ORDER              = 45;
  49.         OBJC_EDIT               = 46;
  50.         OBJC_CHANGE             = 47;
  51.         
  52.         (*  Form Manager
  53.          *)
  54.         FORM_DO                 = 50;
  55.         FORM_DIAL               = 51;
  56.         FORM_ALERT              = 52;
  57.         FORM_ERROR              = 53;
  58.         FORM_CENTER             = 54;
  59.         FORM_KEYBD              = 55;
  60.         FORM_BUTTON             = 56;
  61.         
  62.         (*  Graphics Manager
  63.          *)
  64.         GRAF_RUBBOX             = 70;
  65.         GRAF_DRAGBOX            = 71;
  66.         GRAF_MBOX               = 72;
  67.         GRAF_GROWBOX            = 73;
  68.         GRAF_SHRINKBOX          = 74;
  69.         GRAF_WATCHBOX           = 75;
  70.         GRAF_SLIDEBOX           = 76;
  71.         GRAF_HANDLE             = 77;
  72.         GRAF_MOUSE              = 78;
  73.         GRAF_MKSTATE            = 79;
  74.         
  75.         (*  Scrap Manager
  76.          *)
  77.         SCRP_READ               = 80;
  78.         SCRP_WRITE              = 81;
  79.         
  80.         (*  File Selector Manager
  81.          *)
  82.         FSEL_INPUT              = 90;
  83.         FSEL_EX_INPUT           = 91;   (*  Ab TOS 1.4  *)
  84.         
  85.         (*  Window Manager
  86.          *)
  87.         WIND_CREATE             = 100;
  88.         WIND_OPEN               = 101;
  89.         WIND_CLOSE              = 102;
  90.         WIND_DELETE             = 103;
  91.         WIND_GET                = 104;
  92.         WIND_SET                = 105;
  93.         WIND_FIND               = 106;
  94.         WIND_UPDATE             = 107;
  95.         WIND_CALC               = 108;
  96.         WIND_NEW                = 109;   (*  Ab TOS 1.4  *)
  97.         
  98.         (*  Resource Manager
  99.          *)
  100.         RSRC_LOAD               = 110;
  101.         RSRC_FREE               = 111;
  102.         RSRC_GADDR              = 112;
  103.         RSRC_SADDR              = 113;
  104.         RSRC_OBFIX              = 114;
  105.         
  106.         (*  Shell Manager
  107.          *)
  108.         SHEL_READ               = 120;
  109.         SHEL_WRITE              = 121;
  110.         SHEL_GET                = 122;
  111.         SHEL_PUT                = 123;
  112.         SHEL_FIND               = 124;
  113.         SHEL_ENVRN              = 125;
  114.         
  115.         
  116.                 (*  V D I - Opcodes  *)
  117.                 (*  ===============  *)
  118.     
  119.         V_OPNWK                 = 1;
  120.         V_CLSWK                 = 2;
  121.         CLEAR_WORKSTATION       = 3;
  122.         UPDATE_WORKSTATION      = 4;
  123.         ESCAPE                  = 5;
  124.         POLYLINE                = 6;
  125.         POLYMARKER              = 7;
  126.         GRAF_TEXT               = 8;
  127.         FILLED_AREA             = 9;
  128.     
  129.         CELL_ARRAY              = 10;
  130.         GRAF_STANDARD           = 11;
  131.         SET_TEXT_HEIGHT_ABS     = 12;
  132.         SET_TEXT_BASELINE       = 13;
  133.         SET_COLOR_REP           = 14;
  134.         SET_LINE_TYPE           = 15;
  135.         SET_LINE_WIDTH          = 16;
  136.         SET_LINE_COLOR          = 17;
  137.         SET_MARKER_TYPE         = 18;
  138.         SET_MARKER_HEIGHT       = 19;
  139.         
  140.         SET_MARKER_COLOR        = 20;
  141.         SET_TEXT_FACE           = 21;
  142.         SET_TEXT_COLOR          = 22;
  143.         SET_FILL_INTERIOR       = 23;
  144.         SET_FILL_INDEX          = 24;
  145.         SET_FILL_COLOR          = 25;
  146.         INQUIRE_COLOR           = 26;
  147.         VQ_CELLARRAY            = 27;
  148.         INPUT_LOCATOR           = 28;
  149.         INPUT_VALUATOR          = 29;
  150.         
  151.         INPUT_CHOICE            = 30;
  152.         INPUT_STRING            = 31;
  153.         SET_WRITING_MODE        = 32;
  154.         SET_INPUT_MODE          = 33;
  155.         INQUIRE_LINE            = 35;
  156.         INQUIRE_MARKER          = 36;
  157.         INQUIRE_FILL            = 37;
  158.         INQUIRE_TEXT            = 38;
  159.         SET_TEXT_ALIG           = 39;
  160.     
  161.         OPEN_V_WORK             = 100;
  162.         CLOSE_V_WORK            = 101;
  163.         EXTENDED_INQUIRE        = 102;
  164.         CONTOUR_FILL            = 103;
  165.         SET_FILL_PERIMETER      = 104;
  166.         GET_PIXEL               = 105;
  167.         SET_TEXT_EFFECT         = 106;
  168.         SET_TEXT_HEIGHT_PTS     = 107;
  169.         SET_LINE_END            = 108;
  170.         COPY_RASTER_OPAQUE      = 109;
  171.         
  172.         TRANSFORM_FORM          = 110;
  173.         SET_MOUSE_FORM          = 111;
  174.         SET_FILL_USER           = 112;
  175.         SET_LINE_USER           = 113;
  176.         FILL_RECTANGLE          = 114;
  177.         INQUIRE_INPUT           = 115;
  178.         TEXT_EXTENT             = 116;
  179.         INQUIRE_CELL            = 117;
  180.         EX_TIMER_INTER          = 118;
  181.         LOAD_FONTS              = 119;
  182.         
  183.         UNLOAD_FONTS            = 120;
  184.         COPY_RASTER_TRANSP      = 121;
  185.         SHOW_CURSOR             = 122;
  186.         HIDE_CURSOR             = 123;
  187.         MOUSE_BUTTONS           = 124;
  188.         EX_BUT_CHANGE           = 125;
  189.         EX_MOUSE_MOVE           = 126;
  190.         EX_MOUSE_CHANGE         = 127;
  191.         KEY_STATE               = 128;
  192.         SET_CLIPPING            = 129;
  193.         
  194.         VQT_NAME                = 130;
  195.         VQT_FONTINFO            = 131;
  196.         
  197.         (*  ESCAPE SubCmds
  198.          *)
  199.                 
  200.         VQ_CHCELLS              = 1;
  201.         V_EXIT_CUR              = 2;
  202.         V_ENTER_CUR             = 3;
  203.         V_CURUP                 = 4;
  204.         V_CURDOWN               = 5;
  205.         V_CURRIGHT              = 6;
  206.         V_CURLEFT               = 7;
  207.         V_CURHOME               = 8;
  208.         V_EEOS                  = 9;
  209.         V_EEOL                  = 10;
  210.         VS_CURADDRESS           = 11;
  211.         V_CURTEXT               = 12;
  212.         V_RVON                  = 13;
  213.         V_RVOFF                 = 14;
  214.         VQ_CURADDRESS           = 15;
  215.         VQ_TABSTATUS            = 16;
  216.         V_HARDCOPY              = 17;
  217.         V_DSPCUR                = 18;
  218.         V_RMCUR                 = 19;
  219.         V_FORM_ADV              = 20;
  220.         V_OUTPUT_WINDOW         = 21;
  221.         V_CLEAR_DISP_LIST       = 22;
  222.         V_BIT_IMAGE             = 23;
  223.         VS_PALETTE              = 60;
  224.         VQP_FILMS               = 91;
  225.         VQP_STATE               = 92;
  226.         VSP_STATE               = 93;
  227.         VSP_SAVE                = 94;
  228.         VSP_MESSAGE             = 95;
  229.         VSP_ERROR               = 96;
  230.         V_META_EXTENTS          = 98;
  231.         V_WRITE_META            = 99;
  232.         VM_FILENAME             = 100;
  233.         V_OFFSET                = 101;
  234.         V_FONTINIT              = 102;
  235.         
  236.         
  237.         (*  GRAF_STANDARD SubCmds
  238.          *)
  239.                 
  240.         BAR                     = 1;
  241.         ARC                     = 2;
  242.         PIE                     = 3;
  243.         CIRCLE                  = 4;
  244.         ELLIPSE                 = 5;
  245.         ELLIPTICAL_ARC          = 6;
  246.         ELLIPTICAL_PIE          = 7;
  247.         ROUNDED_RECT            = 8;
  248.         FILL_ROUND_RECT         = 9;
  249.         JUST_TEXT               = 10;
  250.         
  251.         
  252.                 (*  Misc. Codes  *)
  253.                 (*  ===========  *)
  254.                 
  255.         GEMTrap                 = 2;
  256.         VDICode                 = 115;
  257.         AESCode                 = 200;
  258.         
  259. ə
  260. (* $FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFB9C50$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCB$FFFA6CCBü$000009F8T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......$00001F0F$00000026$00000BD0$000009F8$00000BD0$00000087$00000097$000000BF$000000AC$00000E5B$00000E18$00000E2A$000020EA$000020F7$0000211F$0000196EöÇü*)
  261.